home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 5 (Internal Edition) / Apple R&P Lib Internal v5.0.iso / 6-Developer Demos / Developer Demos-Ed. / Macintosh School® CD-ROM Demo / Macintosh SchoolÆ CD-ROM Demo / card_89024.txt < prev    next >
Text File  |  1990-08-14  |  9KB  |  473 lines
  1. -- card: 89024 from stack: in
  2. -- bmap block id: 89651
  3. -- flags: 4000
  4. -- background id: 69011
  5. -- name: Periods
  6. ----- HyperTalk script -----
  7. on openCard
  8.   global buttonName, buttonList
  9.   put the long date into field date
  10.   set hilite of background button id buttonName to false
  11.   repeat with index = 1 to the number of lines of buttonList
  12.     set hilite of background button id line index of buttonList to false
  13.   end repeat
  14. end openCard
  15.  
  16. on closeCard
  17.   global buttonName, buttonList
  18.   set hilite of background button id buttonName to true
  19.   repeat with index = 1 to the number of lines of buttonList
  20.     set hilite of background button id line index of buttonList to true
  21.   end repeat
  22.   repeat with index = 7 to 19
  23.     set hilite of button id index to false
  24.   end repeat
  25.   set hilite of button "Daily" to true
  26.   set hilite of button "Period" to false
  27. end closeCard
  28.  
  29. on groupOne
  30.   if the shiftKey is down then
  31.     set hilite of target to not hilite of target
  32.   else
  33.     lock screen
  34.     repeat with index = 7 to 19
  35.       set hilite of button id index to false
  36.     end repeat
  37.     set hilite of target to true
  38.     unlock screen
  39.   end if
  40. end groupOne
  41.  
  42.  
  43.  
  44. -- part 1 (button)
  45. -- low flags: 00
  46. -- high flags: 0000
  47. -- rect: left=0 top=0 right=342 bottom=512
  48. -- title width / last selected line: 0
  49. -- icon id / first selected line: 0 / 0
  50. -- text alignment: 1
  51. -- font id: 0
  52. -- text size: 12
  53. -- style flags: 0
  54. -- line height: 16
  55. -- part name: 
  56.  
  57.  
  58. -- part 2 (button)
  59. -- low flags: 00
  60. -- high flags: 0000
  61. -- rect: left=66 top=29 right=46 bottom=152
  62. -- title width / last selected line: 0
  63. -- icon id / first selected line: 0 / 0
  64. -- text alignment: 1
  65. -- font id: 0
  66. -- text size: 12
  67. -- style flags: 0
  68. -- line height: 16
  69. -- part name: Students
  70. ----- HyperTalk script -----
  71. on mouseUp
  72.   lock screen
  73.   go to card short name of me of this stack
  74.   unlock screen
  75. end mouseUp
  76.  
  77.  
  78.  
  79. -- part 3 (button)
  80. -- low flags: 00
  81. -- high flags: 0000
  82. -- rect: left=246 top=29 right=46 bottom=332
  83. -- title width / last selected line: 0
  84. -- icon id / first selected line: 0 / 0
  85. -- text alignment: 1
  86. -- font id: 0
  87. -- text size: 12
  88. -- style flags: 0
  89. -- line height: 16
  90. -- part name: Exceptions
  91. ----- HyperTalk script -----
  92. on mouseUp
  93.   lock screen
  94.   go to card short name of me of this stack
  95.   unlock screen
  96. end mouseUp
  97.  
  98.  
  99.  
  100. -- part 4 (button)
  101. -- low flags: 00
  102. -- high flags: 0000
  103. -- rect: left=336 top=29 right=46 bottom=422
  104. -- title width / last selected line: 0
  105. -- icon id / first selected line: 0 / 0
  106. -- text alignment: 1
  107. -- font id: 0
  108. -- text size: 12
  109. -- style flags: 0
  110. -- line height: 16
  111. -- part name: Format
  112. ----- HyperTalk script -----
  113. on mouseUp
  114.   lock screen
  115.   go to card short name of me of this stack
  116.   unlock screen
  117. end mouseUp
  118.  
  119.  
  120.  
  121. -- part 5 (button)
  122. -- low flags: 00
  123. -- high flags: 2000
  124. -- rect: left=326 top=216 right=234 bottom=404
  125. -- title width / last selected line: 0
  126. -- icon id / first selected line: 0 / 0
  127. -- text alignment: 1
  128. -- font id: 0
  129. -- text size: 12
  130. -- style flags: 0
  131. -- line height: 16
  132. -- part name: Print
  133. ----- HyperTalk script -----
  134. on mouseUp
  135.   lock screen
  136.   go to card "Exception Report" of this background
  137.   unlock screen
  138. end mouseUp
  139.  
  140.  
  141.  
  142. -- part 6 (button)
  143. -- low flags: 00
  144. -- high flags: 2000
  145. -- rect: left=326 top=253 right=271 bottom=404
  146. -- title width / last selected line: 0
  147. -- icon id / first selected line: 0 / 0
  148. -- text alignment: 1
  149. -- font id: 0
  150. -- text size: 12
  151. -- style flags: 0
  152. -- line height: 16
  153. -- part name: Cancel
  154. ----- HyperTalk script -----
  155. on mouseUp
  156.   lock screen
  157.   pop card
  158.   unlock screen
  159. end mouseUp
  160.  
  161.  
  162.  
  163. -- part 7 (button)
  164. -- low flags: 00
  165. -- high flags: 0000
  166. -- rect: left=66 top=91 right=105 bottom=259
  167. -- title width / last selected line: 0
  168. -- icon id / first selected line: 0 / 0
  169. -- text alignment: 1
  170. -- font id: 0
  171. -- text size: 12
  172. -- style flags: 0
  173. -- line height: 16
  174. -- part name: 
  175. ----- HyperTalk script -----
  176. on mouseUp
  177.   groupOne
  178. end mouseUp
  179.  
  180.  
  181.  
  182. -- part 8 (button)
  183. -- low flags: 00
  184. -- high flags: 0000
  185. -- rect: left=66 top=105 right=119 bottom=259
  186. -- title width / last selected line: 0
  187. -- icon id / first selected line: 0 / 0
  188. -- text alignment: 1
  189. -- font id: 0
  190. -- text size: 12
  191. -- style flags: 0
  192. -- line height: 16
  193. -- part name: 
  194. ----- HyperTalk script -----
  195. on mouseUp
  196.   groupOne
  197. end mouseUp
  198.  
  199.  
  200.  
  201. -- part 9 (button)
  202. -- low flags: 00
  203. -- high flags: 0000
  204. -- rect: left=66 top=119 right=133 bottom=259
  205. -- title width / last selected line: 0
  206. -- icon id / first selected line: 0 / 0
  207. -- text alignment: 1
  208. -- font id: 0
  209. -- text size: 12
  210. -- style flags: 0
  211. -- line height: 16
  212. -- part name: 
  213. ----- HyperTalk script -----
  214. on mouseUp
  215.   groupOne
  216. end mouseUp
  217.  
  218.  
  219.  
  220. -- part 10 (button)
  221. -- low flags: 00
  222. -- high flags: 0000
  223. -- rect: left=66 top=133 right=147 bottom=259
  224. -- title width / last selected line: 0
  225. -- icon id / first selected line: 0 / 0
  226. -- text alignment: 1
  227. -- font id: 0
  228. -- text size: 12
  229. -- style flags: 0
  230. -- line height: 16
  231. -- part name: 
  232. ----- HyperTalk script -----
  233. on mouseUp
  234.   groupOne
  235. end mouseUp
  236.  
  237.  
  238.  
  239. -- part 11 (button)
  240. -- low flags: 00
  241. -- high flags: 0000
  242. -- rect: left=66 top=147 right=161 bottom=259
  243. -- title width / last selected line: 0
  244. -- icon id / first selected line: 0 / 0
  245. -- text alignment: 1
  246. -- font id: 0
  247. -- text size: 12
  248. -- style flags: 0
  249. -- line height: 16
  250. -- part name: 
  251. ----- HyperTalk script -----
  252. on mouseUp
  253.   groupOne
  254. end mouseUp
  255.  
  256.  
  257.  
  258. -- part 12 (button)
  259. -- low flags: 00
  260. -- high flags: 0000
  261. -- rect: left=66 top=161 right=175 bottom=259
  262. -- title width / last selected line: 0
  263. -- icon id / first selected line: 0 / 0
  264. -- text alignment: 1
  265. -- font id: 0
  266. -- text size: 12
  267. -- style flags: 0
  268. -- line height: 16
  269. -- part name: 
  270. ----- HyperTalk script -----
  271. on mouseUp
  272.   groupOne
  273. end mouseUp
  274.  
  275.  
  276.  
  277. -- part 13 (button)
  278. -- low flags: 00
  279. -- high flags: 0000
  280. -- rect: left=66 top=175 right=189 bottom=259
  281. -- title width / last selected line: 0
  282. -- icon id / first selected line: 0 / 0
  283. -- text alignment: 1
  284. -- font id: 0
  285. -- text size: 12
  286. -- style flags: 0
  287. -- line height: 16
  288. -- part name: 
  289. ----- HyperTalk script -----
  290. on mouseUp
  291.   groupOne
  292. end mouseUp
  293.  
  294.  
  295.  
  296. -- part 14 (button)
  297. -- low flags: 00
  298. -- high flags: 0000
  299. -- rect: left=66 top=189 right=203 bottom=259
  300. -- title width / last selected line: 0
  301. -- icon id / first selected line: 0 / 0
  302. -- text alignment: 1
  303. -- font id: 0
  304. -- text size: 12
  305. -- style flags: 0
  306. -- line height: 16
  307. -- part name: 
  308. ----- HyperTalk script -----
  309. on mouseUp
  310.   groupOne
  311. end mouseUp
  312.  
  313.  
  314.  
  315. -- part 15 (button)
  316. -- low flags: 00
  317. -- high flags: 0000
  318. -- rect: left=66 top=203 right=217 bottom=259
  319. -- title width / last selected line: 0
  320. -- icon id / first selected line: 0 / 0
  321. -- text alignment: 1
  322. -- font id: 0
  323. -- text size: 12
  324. -- style flags: 0
  325. -- line height: 16
  326. -- part name: 
  327.  
  328.  
  329. -- part 16 (button)
  330. -- low flags: 00
  331. -- high flags: 0000
  332. -- rect: left=66 top=217 right=231 bottom=259
  333. -- title width / last selected line: 0
  334. -- icon id / first selected line: 0 / 0
  335. -- text alignment: 1
  336. -- font id: 0
  337. -- text size: 12
  338. -- style flags: 0
  339. -- line height: 16
  340. -- part name: 
  341.  
  342.  
  343. -- part 17 (button)
  344. -- low flags: 00
  345. -- high flags: 0000
  346. -- rect: left=66 top=231 right=245 bottom=259
  347. -- title width / last selected line: 0
  348. -- icon id / first selected line: 0 / 0
  349. -- text alignment: 1
  350. -- font id: 0
  351. -- text size: 12
  352. -- style flags: 0
  353. -- line height: 16
  354. -- part name: 
  355.  
  356.  
  357. -- part 18 (button)
  358. -- low flags: 00
  359. -- high flags: 0000
  360. -- rect: left=66 top=245 right=259 bottom=259
  361. -- title width / last selected line: 0
  362. -- icon id / first selected line: 0 / 0
  363. -- text alignment: 1
  364. -- font id: 0
  365. -- text size: 12
  366. -- style flags: 0
  367. -- line height: 16
  368. -- part name: 
  369.  
  370.  
  371. -- part 19 (button)
  372. -- low flags: 00
  373. -- high flags: 0000
  374. -- rect: left=66 top=259 right=273 bottom=259
  375. -- title width / last selected line: 0
  376. -- icon id / first selected line: 0 / 0
  377. -- text alignment: 1
  378. -- font id: 0
  379. -- text size: 12
  380. -- style flags: 0
  381. -- line height: 16
  382. -- part name: 
  383.  
  384.  
  385. -- part 20 (button)
  386. -- low flags: 00
  387. -- high flags: C006
  388. -- rect: left=314 top=110 right=126 bottom=380
  389. -- title width / last selected line: 0
  390. -- icon id / first selected line: 0 / 0
  391. -- text alignment: 1
  392. -- font id: 0
  393. -- text size: 12
  394. -- style flags: 0
  395. -- line height: 16
  396. -- part name: Daily
  397. ----- HyperTalk script -----
  398. on mouseUp
  399.   set hilite of button "Period" to false
  400.   set hilite of me to true
  401. end mouseUp
  402.  
  403.  
  404.  
  405. -- part 21 (button)
  406. -- low flags: 00
  407. -- high flags: 8006
  408. -- rect: left=314 top=126 right=142 bottom=380
  409. -- title width / last selected line: 0
  410. -- icon id / first selected line: 0 / 0
  411. -- text alignment: 1
  412. -- font id: 0
  413. -- text size: 12
  414. -- style flags: 0
  415. -- line height: 16
  416. -- part name: Period
  417. ----- HyperTalk script -----
  418. on mouseUp
  419.   set hilite of button "Daily" to false
  420.   set hilite of me to true
  421. end mouseUp
  422.  
  423.  
  424.  
  425. -- part contents for background part 28
  426. ----- text -----
  427. Abrosimoff, Mich‚Ķ
  428. Adams, Bryan
  429. Alexander, Rick
  430. Alexander, Susan
  431. Allsop, Blair M.
  432. Azimov, Isaac
  433. Barisoff, Larissa
  434. Bunyan, Paul
  435. Burnyeat, Grant
  436. Caldwell, Brian
  437.  
  438.  
  439.  
  440. -- part contents for background part 29
  441. ----- text -----
  442. 47
  443. 80
  444. 53
  445. 54
  446. 52
  447. 102
  448. 48
  449. 13
  450. 94
  451. 93
  452.  
  453. -- part contents for background part 30
  454. ----- text -----
  455. Present
  456. Present
  457. Present
  458. Present
  459. Present
  460. Present
  461. Present
  462. Present
  463. Present
  464. Present
  465.  
  466.  
  467. -- part contents for background part 33
  468. ----- text -----
  469. 0 students selected
  470.  
  471. -- part contents for background part 31
  472. ----- text -----
  473. Monday, September 4, 1989